home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / mac / Chapter Tutorials / CaseStudies / ch10.macromedia / spot.dcr / 00016.ls < prev    next >
Encoding:
Text File  |  1996-11-11  |  165 b   |  9 lines
  1. on exitFrame
  2.   global gRandomTimer
  3.   if the timer >= gRandomTimer then
  4.     puppetSound("fire")
  5.     go("burning")
  6.     set gRandomTimer to random(5 * 60)
  7.   end if
  8. end
  9.